;--------------------------------------
;
; restcur.asm
;
; resets the cursor info
;

;--------------------------------------
;
; include defs, prototypes and macros
;

include tab6.inc

;--------------------------------------
;
; begin code segment
;


    .Code

;--------------------------------------
;
; restCur(void)
;  
;

restCur PROC Pascal PUBLIC
    mov    bh,0                   ; page 0 cursor
    mov    ch,cursor_start        ; restore shape start
    mov    cl,cursor_end          ; restore shape end
    mov    ah,SET_CURSOR_SHAPE    ; set shape function
    int    10h                    ; via BIOS
    mov    dh,cursor_row          ; restore row
    mov    dl,cursor_column       ; restore column
    mov    ah,SET_CURSOR_POSITION ; set cursor location
    int    10h                    ; via BIOS int 10h
    ret                           ; return to caller
restCur ENDP

;
; end of restCur procedure
;

    END
;
;--------------------------------------
